home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / grphwiz.dxr / 00055_back button.ls < prev    next >
Encoding:
Text File  |  2000-01-14  |  727 b   |  36 lines

  1. property ancestor, pMIAW
  2. global gGraphHelp
  3.  
  4. on new me, buttonName, castName, theChannel, theStageLoc, descendant
  5.   if objectp(descendant) then
  6.     ancestor = new(script("generic button"), buttonName, castName, theChannel, theStageLoc, descendant)
  7.   else
  8.     ancestor = new(script("generic button"), buttonName, castName, theChannel, theStageLoc, me)
  9.   end if
  10.   return me
  11. end
  12.  
  13. on setMIAW me, miaw
  14.   pMIAW = miaw
  15.   return me
  16. end
  17.  
  18. on moveStageLocLeft me
  19.   me.pStageLoc = point(340, 250)
  20.   return me
  21. end
  22.  
  23. on moveStageLocRight me
  24.   me.pStageLoc = point(363, 250)
  25.   return me
  26. end
  27.  
  28. on performFunction me
  29.   outScope(pMIAW)
  30.   if windowPresent("Graph Help") then
  31.     closeMe(gGraphHelp)
  32.   end if
  33.   go(getLastPage(pMIAW))
  34.   return me
  35. end
  36.